home *** CD-ROM | disk | FTP | other *** search
/ Champak 109 / Vol 109.iso / games / stepp000.swf / scripts / DefineSprite_691 / frame_2 / DoAction.as
Encoding:
Text File  |  2008-11-12  |  2.1 KB  |  51 lines
  1. a = 1;
  2. while(eval("/Variables:InvObjet" + a) != eval("/Variables:ObjetCombine"))
  3. {
  4.    a += 1;
  5. }
  6. i = a;
  7. while(eval("/Variables:InvObjet" + i) != 0 and i < eval("/Variables:InvNbMax"))
  8. {
  9.    set("/Variables:InvObjet" + i,eval("/Variables:InvObjet" + (i + 1)));
  10.    i += 1;
  11. }
  12. i = 1;
  13. while(eval("/Variables:InvNbMax") >= i)
  14. {
  15.    tellTarget("../Chaine1/Objet" + i)
  16.    {
  17.       gotoAndStop(eval("/Variables:InvObjet" + i) + 1);
  18.    }
  19.    tellTarget("../Chaine2/Objet" + i)
  20.    {
  21.       gotoAndStop(eval("/Variables:InvObjet" + i) + 1);
  22.    }
  23.    tellTarget("../Chaine3/Objet" + i)
  24.    {
  25.       gotoAndStop(eval("/Variables:InvObjet" + i) + 1);
  26.    }
  27.    i += 1;
  28. }
  29. if(eval("/Variables:InvNb") < 4)
  30. {
  31.    setProperty("../Chaine2", _X, getProperty("../BorneGauche", _X) + eval("/Variables:LargeurObjet") / 4);
  32.    setProperty("../Chaine1", _X, getProperty("../Chaine2", _X) - 3 * eval("/Variables:LargeurObjet"));
  33.    setProperty("../Chaine3", _X, getProperty("../Chaine2", _X) + 3 * eval("/Variables:LargeurObjet"));
  34. }
  35. else if(getProperty("../Chaine1", _X) < getProperty("../Chaine2", _X) and getProperty("../Chaine3", _X) < getProperty("../Chaine1", _X))
  36. {
  37.    setProperty("../Chaine3", _X, getProperty("../Chaine1", _X) - eval("/Variables:InvNb") * eval("/Variables:LargeurObjet"));
  38.    setProperty("../Chaine2", _X, getProperty("../Chaine1", _X) + eval("/Variables:InvNb") * eval("/Variables:LargeurObjet"));
  39. }
  40. else if(getProperty("../Chaine2", _X) < getProperty("../Chaine3", _X) and getProperty("../Chaine1", _X) < getProperty("../Chaine2", _X))
  41. {
  42.    setProperty("../Chaine1", _X, getProperty("../Chaine2", _X) - eval("/Variables:InvNb") * eval("/Variables:LargeurObjet"));
  43.    setProperty("../Chaine3", _X, getProperty("../Chaine2", _X) + eval("/Variables:InvNb") * eval("/Variables:LargeurObjet"));
  44. }
  45. else
  46. {
  47.    setProperty("../Chaine2", _X, getProperty("../Chaine3", _X) - eval("/Variables:InvNb") * eval("/Variables:LargeurObjet"));
  48.    setProperty("../Chaine1", _X, getProperty("../Chaine2", _X) + eval("/Variables:InvNb") * eval("/Variables:LargeurObjet"));
  49. }
  50. gotoAndStop(1);
  51.